home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
How Would You Survive?
/
How Would You Survive (1995)(Grolier)[Mac-PC].iso
/
mac
/
AZTECW.DIR
/
01701_Script_Mealtimes
< prev
next >
Wrap
Text File
|
1995-09-12
|
3KB
|
101 lines
global gQuest, gBeenClicked, gHouseIsOpen
on AFoodRollovers1
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(9) then
repeat while rollover(9)
AztecCursor
puppetsprite 10, true
set the locH of sprite 10 to 138
set the locV of sprite 10 to 290
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
repeat while gBeenClicked = 1
AnimateToSlowPauseFrom 6, 413, 3, "SA200500.AIF", 1
end repeat
end if
end if
end repeat
set the locH of sprite 10 to 938
puppetsprite 10, false
updatestage
else
if rollover(7) then
ArrowCursor
repeat while rollover(7)
set the locH of sprite 8 to 260
set the locV of sprite 8 to 264
updatestage
end repeat
set the locH of sprite 8 to 960
updatestage
else
if rollover(40) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on AFoodRollovers2
set gBeenClicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(6) or rollover(7) then
repeat while rollover(6) or rollover(7)
AztecCursor
puppetsprite 8, true
set the locH of sprite 8 to 420
set the locV of sprite 8 to 227
updatestage
if the mousedown then
set GBeenClicked = 1
else
if gBeenClicked = 1 then
set the locH of sprite 8 to 820
updatestage
repeat while gBeenClicked = 1
AnimateLoop 6, 420, 4, "SA200501.AIF", 1
end repeat
end if
end if
end repeat
set the locH of sprite 8 to 920
puppetsprite 8, false
updatestage
else
if rollover(39) then
HandCursor
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end